﻿Public Class CasillaTierra : Inherits Casilla

    Protected _Ocupado As Boolean

    Public Sub New()
        Me._Ocupado = True
        'Me._Imagen = My.Resources.
    End Sub

    Public Property Ocupado() As Boolean
        Get
            Return _Ocupado
        End Get
        Set(ByVal value As Boolean)
            _Ocupado = value
        End Set
    End Property
End Class
